home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / dev / lang / PPCsmalltalk.lha / PPCSmallTalk / prelude / tests.st < prev    next >
Text File  |  1986-10-19  |  180b  |  24 lines
  1. Class One
  2. | two |
  3. [
  4.     start
  5.         ^ self one
  6. |
  7.     one
  8.         two <- Two new.
  9.         two two: self
  10. |
  11.     three
  12.         two four
  13. ]
  14. Class Two
  15. [
  16.     two: back
  17.         back three
  18. |
  19.     four
  20.         'in four' print.
  21.         self gak
  22. ]
  23.  
  24.